home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / procdlg.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  3.1 KB  |  96 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'ProcDlg.pas' rev: 3.00
  6.  
  7. #ifndef ProcDlgHPP
  8. #define ProcDlgHPP
  9. #include <DBTables.hpp>
  10. #include <Db.hpp>
  11. #include <Buttons.hpp>
  12. #include <StdCtrls.hpp>
  13. #include <Dialogs.hpp>
  14. #include <Forms.hpp>
  15. #include <Controls.hpp>
  16. #include <Graphics.hpp>
  17. #include <Classes.hpp>
  18. #include <Messages.hpp>
  19. #include <Windows.hpp>
  20. #include <SysUtils.hpp>
  21. #include <SysInit.hpp>
  22. #include <System.hpp>
  23.  
  24. //-- user supplied -----------------------------------------------------------
  25.  
  26. namespace Procdlg
  27. {
  28. //-- type declarations -------------------------------------------------------
  29. class DELPHICLASS TProcParams;
  30. class PASCALIMPLEMENTATION TProcParams : public Forms::TForm 
  31. {
  32.     typedef Forms::TForm inherited;
  33.     
  34. __published:
  35.     Stdctrls::TGroupBox* GroupBox1;
  36.     Stdctrls::TLabel* Label1;
  37.     Stdctrls::TEdit* ParamValue;
  38.     Stdctrls::TLabel* Label2;
  39.     Stdctrls::TCheckBox* NullValue;
  40.     Stdctrls::TLabel* Label3;
  41.     Stdctrls::TComboBox* TypeList;
  42.     Stdctrls::TComboBox* ParamTypeList;
  43.     Stdctrls::TLabel* Label4;
  44.     Stdctrls::TListBox* ParamList;
  45.     Stdctrls::TButton* OkBtn;
  46.     Stdctrls::TButton* CancelBtn;
  47.     Stdctrls::TButton* HelpBtn;
  48.     Stdctrls::TButton* AddButton;
  49.     Stdctrls::TButton* DeleteButton;
  50.     Stdctrls::TButton* ClearButton;
  51.     void __fastcall ParamListChange(System::TObject* Sender);
  52.     void __fastcall TypeListChange(System::TObject* Sender);
  53.     void __fastcall ParamValueExit(System::TObject* Sender);
  54.     void __fastcall NullValueClick(System::TObject* Sender);
  55.     void __fastcall ParamTypeListChange(System::TObject* Sender);
  56.     void __fastcall DeleteButtonClick(System::TObject* Sender);
  57.     void __fastcall ClearButtonClick(System::TObject* Sender);
  58.     void __fastcall AddButtonClick(System::TObject* Sender);
  59.     void __fastcall FormCreate(System::TObject* Sender);
  60.     void __fastcall OkBtnClick(System::TObject* Sender);
  61.     void __fastcall HelpBtnClick(System::TObject* Sender);
  62.     
  63. private:
  64.     Dbtables::TParams* InitList;
  65.     bool AlterParamList;
  66.     bool InValueExit;
  67.     bool InParamChange;
  68.     void __fastcall CheckValue(void);
  69.     bool __fastcall Edit(void);
  70.     void __fastcall InitValues(void);
  71.     void __fastcall SetControls(bool Value);
  72.     void __fastcall Unbind(void);
  73. public:
  74.     /* TCustomForm.Create */ __fastcall virtual TProcParams(Classes::TComponent* AOwner) : Forms::TForm(
  75.         AOwner) { }
  76.     /* TCustomForm.CreateNew */ __fastcall TProcParams(Classes::TComponent* AOwner, int Dummy) : Forms::
  77.         TForm(AOwner, Dummy) { }
  78.     /* TCustomForm.Destroy */ __fastcall virtual ~TProcParams(void) { }
  79.     
  80. public:
  81.     /* TWinControl.CreateParented */ __fastcall TProcParams(HWND ParentWindow) : Forms::TForm(ParentWindow
  82.         ) { }
  83.     
  84. };
  85.  
  86. //-- var, const, procedure ---------------------------------------------------
  87. extern PACKAGE bool __fastcall EditProcParams(Dbtables::TStoredProc* DataSet, Dbtables::TParams* List
  88.     );
  89.  
  90. }    /* namespace Procdlg */
  91. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  92. using namespace Procdlg;
  93. #endif
  94. //-- end unit ----------------------------------------------------------------
  95. #endif    // ProcDlg
  96.